added samples
[windows-sources.git] / sdk / samples / WFSamples / Technologies / Roles / WebWorkflowRole / VB / POInterface / My Project / Settings.Designer.vb
blob5c1fdf74b58cc1c420bb8144eb3c219cb7565b42
1 '---------------------------------------------------------------------
2 ' This file is part of the Windows Workflow Foundation SDK Code Samples.
3 '
4 ' Copyright (C) Microsoft Corporation. All rights reserved.
5 '
6 'This source code is intended only as a supplement to Microsoft
7 'Development Tools and/or on-line documentation. See these other
8 'materials for detailed information regarding Microsoft code samples.
9 '
10 'THIS CODE AND INFORMATION ARE PROVIDED AS IS WITHOUT WARRANTY OF ANY
11 'KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE
12 'IMPLIED WARRANTIES OF MERCHANTABILITY AND/OR FITNESS FOR A
13 'PARTICULAR PURPOSE.
14 '---------------------------------------------------------------------
16 '------------------------------------------------------------------------------
17 ' <auto-generated>
18 ' This code was generated by a tool.
19 ' Runtime Version:2.0.50727.42
21 ' Changes to this file may cause incorrect behavior and will be lost if
22 ' the code is regenerated.
23 ' </auto-generated>
24 '------------------------------------------------------------------------------
26 Option Strict On
27 Option Explicit On
31 <Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
32 Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "8.0.0.0"), _
33 Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
34 Partial Friend NotInheritable Class Settings
35 Inherits Global.System.Configuration.ApplicationSettingsBase
37 Private Shared defaultInstance As Settings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New Settings),Settings)
39 #Region "My.Settings Auto-Save Functionality"
40 #If _MyType = "WindowsForms" Then
41 Private Shared addedHandler As Boolean
43 Private Shared addedHandlerLockObject As New Object
45 <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
46 Private Shared Sub AutoSaveSettings(ByVal sender As Global.System.Object, ByVal e As Global.System.EventArgs)
47 If My.Application.SaveMySettingsOnExit Then
48 My.Settings.Save()
49 End If
50 End Sub
51 #End If
52 #End Region
54 Public Shared ReadOnly Property [Default]() As Settings
55 Get
57 #If _MyType = "WindowsForms" Then
58 If Not addedHandler Then
59 SyncLock addedHandlerLockObject
60 If Not addedHandler Then
61 AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
62 addedHandler = True
63 End If
64 End SyncLock
65 End If
66 #End If
67 Return defaultInstance
68 End Get
69 End Property
70 End Class
72 Namespace My
74 <Global.Microsoft.VisualBasic.HideModuleNameAttribute(), _
75 Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
76 Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute()> _
77 Friend Module MySettingsProperty
79 <Global.System.ComponentModel.Design.HelpKeywordAttribute("My.Settings")> _
80 Friend ReadOnly Property Settings() As Global.Microsoft.Samples.Workflow.WebWorkflow.Settings
81 Get
82 Return Global.Microsoft.Samples.Workflow.WebWorkflow.Settings.Default
83 End Get
84 End Property
85 End Module
86 End Namespace